home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 2 / CU Amiga Magazine's Super CD-ROM 02 (1996)(EMAP Images)(GB)[!][issue 1996-04].iso / magazine / amiga_e / economic / bgui.library / install / workbench_2.1+ / installbgui21 < prev    next >
Text File  |  1994-08-24  |  9KB  |  264 lines
  1. ;
  2. ; Installation script for the bgui.library (OS 2.1 or better)
  3. ;
  4. ; NOTE: Most languages still need to be translated. For each
  5. ;       language that is not translated the text will appear
  6. ;       in the english language.
  7. ;
  8.  
  9. (set @default-dest "")
  10. (set cat-source   "//locale/")
  11. (set lib-source   "//libs/bgui.library")
  12. (set lib-def-dest "LIBS:")
  13. (set oldlevel     @user-level)
  14.  
  15. ;*****************************************************************************
  16. ; ENGLISH
  17. (set def-language 4)
  18. (set lib-to       "Where do you want the bgui.library copied in?")
  19. (set lib-help
  20.         (cat      "If you have a special directory setup for third-party"
  21.                   " libraries you can select it here.\n\n"
  22.                   @askdir-help
  23.         )
  24. )
  25. (set wrong-kick   "You must be running Kickstart 2.04 to use the bgui.library.")
  26. (set copy-msg     "Copying the bgui.library to ")
  27. (set hail-msg
  28.         (cat      "\n\n\nBGUI installation script.\n"
  29.                   "This script will install the bgui.library on your Amiga.\n\n"
  30.                   "The bgui.library is\n(C) Copyright 1993-1994 Jaba Development.\n"
  31.                   "All Rights Reserved."
  32.         )
  33. )
  34. (set lang-msg     "Which languages should be installed?")
  35. (set lang-help
  36.         (cat      "The Amiga has the ability to operate in different languages."
  37.                   " If you want BGUI to use the same language as the Workbench"
  38.                   " you must select the language(s) you want. To preserve disk"
  39.                   " space you should only select the languages you really need.\n\n"
  40.                   @askoptions-help
  41.         )
  42. )
  43.  
  44. ;*****************************************************************************
  45. ; NEDERLANDS
  46. (if (= @language "nederlands")
  47. (
  48. (set def-language 64)
  49. (set lib-to       "Waar wilt u de bgui.library in kopieëren?")
  50. (set lib-help
  51.         (cat      "Als U een speciale lade heeft aangemaakt voor libraries die"
  52.                   " niet standaard bij het systeem horen kunt U deze lade hier"
  53.                   " selecteren.\n\n"
  54.                   @askdir-help
  55.         )
  56. )
  57. (set wrong-kick
  58.         (cat      "U heeft minimaal Kickstart 2.04 nodig om de bgui.library\n"
  59.                   "te kunnen gebruiken."
  60.         )
  61. )
  62. (set copy-msg     "Kopieër de bgui.library in ")
  63. (set hail-msg
  64.         (cat      "\n\n\nBGUI installatie script.\n"
  65.                   "Dit script installeerd de bgui.library op uw Amiga.\n\n"
  66.                   "De bgui.library is\n(C) Copyright 1993-1994 Jaba Development.\n"
  67.                   "All Rights Reserved."
  68.         )
  69. )
  70. (set lang-msg     "Welke talen wilt U geïstalleerd hebben?")
  71. (set lang-help
  72.         (cat      "Met de Amiga heeft U de mogelijkheid om in verschillende"
  73.                   " talen te werken. Als U wilt dat BGUI de zelfde taal als"
  74.                   " de Workbench gebruikt moet U de talen die U nodig heeft"
  75.                   " kiezen. Om de ruimte op de diskette te sparen kunt U het"
  76.                   " beste alleen de talen kiezen die U echt nodig heeft.\n\n"
  77.                   @askoptions-help
  78.         )
  79. )
  80. ))
  81.  
  82. ;*****************************************************************************
  83. ; DANSK
  84. (if (= @language "dansk")
  85. (
  86. (set def-language 1)
  87. ))
  88.  
  89. ;*****************************************************************************
  90. ; DEUTSCH
  91. (if (= @language "deutsch")
  92. (
  93. (set def-language 2)
  94. (set lib-to       "Wohin soll die bgui.library kopiert werden?")
  95. (set lib-help
  96.         (cat      "Falls ein spezielles Verzeichnis fuer Fremdbibliotheken"
  97.                   " vorhandend ist kann es hier angewählt werden.\n\n"
  98.                   @askdir-help
  99.         )
  100. )
  101. (set wrong-kick   "Fuer die bgui.library wird mindestens Kickstart 2.04 benötigt.")
  102. (set copy-msg     "Kopiere die bgui.library nach ")
  103. (set hail-msg
  104.         (cat      "\n\n\nBGUI Installations Skript.\n"
  105.                   "Dieses Skript installiert die bgui.library auf Ihrem Amiga.\n\n"
  106.                   "Die bgui.library ist\n(C) Copyright 1993-1994 Jaba Development.\n"
  107.                   "Alle Rechte vorbehalten."
  108.         )
  109. )
  110. (set lang-msg     "Welche Sprache soll installiert werden?")
  111. (set lang-help
  112.         (cat      "Der Amiga hat die Fähigkeit in verschiedenen Sprachen zu operieren."
  113.                   " Falls Sie wollen, daß BGUI dieselbe Sprache benutzt wie Ihre"
  114.                   " Workbench müssen Sie die jeweilige(n) Sprache(n) anwählen. Um"
  115.                   " Platz zu sparen sollten Sie nur diejenigen Sprachen anwählen, die"
  116.                   " Sie wirklich brauchen.\n\n"
  117.                   @askoptions-help
  118.         )
  119. )
  120. ))
  121.  
  122. ;*****************************************************************************
  123. ; ESPAÑOL
  124. (if (= @language "español")
  125. (
  126. (set def-language 8)
  127. ))
  128.  
  129. ;*****************************************************************************
  130. ; FRANÇOIS
  131. (if (= @language "français")
  132. (
  133. (set def-language 16)
  134. ))
  135.  
  136. ;*****************************************************************************
  137. ; ITALIANO
  138. (if (= @language "italiano")
  139. (
  140. (set def-language 32)
  141. ))
  142.  
  143. ;*****************************************************************************
  144. ; NORSK
  145. (if (= @language "norsk")
  146. (
  147. (set def-language 128)
  148. (set lib-to       "Hvor vil du ha bgui.library kopiert til?")
  149. (set lib-help
  150.         (cat      "Hvis du har en spesiell katalog avsatt for tredjeparts"
  151.                   " biblioteker, kan du velge den her.\n\n"
  152.                   @askdir-help
  153.         )
  154. )
  155. (set wrong-kick   "Du må kjøre Kickstart 2.04 eller høyere for å bruke bgui.library.")
  156. (set copy-msg     "Kopierer bgui.library til ")
  157. (set hail-msg
  158.         (cat      "\n\n\nBGUI installasjons skript.\n"
  159.                   "Dette skriptet vil installere bgui.library på din Amiga.\n\n"
  160.                   "bgui.library er\n(C) Copyright 1993-1994 Jaba Development.\n"
  161.                   "All Rights Reserved."
  162.         )
  163. )
  164. (set lang-msg     "Hvilke språk skal bli installert?")
  165. (set lang-help
  166.         (cat      "Amigaen har mulighet for å bruke forskjellige språk."
  167.                   " Hvis du vil at BGUI skal bruke samme språk som Workbench,"
  168.                   " må du velge det språket / de språkene du vil ha. For å spare diskplass"
  169.                   " bør du bare velge det språket du trenger.\n\n"
  170.                   @askoptions-help
  171.         )
  172. )
  173. ))
  174.  
  175. ;*****************************************************************************
  176. ; PORTUGUÊS
  177. (if (= @language "português")
  178. (
  179. (set def-language 256)
  180. ))
  181.  
  182. ;*****************************************************************************
  183. ; SVENSKA
  184. (if (= @language "svenska")
  185. (
  186. (set def-language 512)
  187. ))
  188.  
  189.  
  190. ; Correct OS version?
  191.  
  192. (if (< (/ (getversion) 65536) 37) (abort wrong-kick))
  193.  
  194. (message hail-msg)
  195.  
  196. ; Ask where to copy the library.
  197.  
  198. (user 2)
  199. (set lib-dest
  200.         (askdir
  201.                 (prompt  lib-to)
  202.                 (help    lib-help)
  203.                 (default lib-def-dest)
  204.         )
  205. )
  206.  
  207. ; Copy the library.
  208.  
  209. (user oldlevel)
  210. (copylib
  211.         (prompt (cat copy-msg (tackon lib-dest "bgui.library") "..."))
  212.         (help   @copylib-help)
  213.         (source lib-source)
  214.         (dest   lib-dest)
  215.         (confirm)
  216. )
  217.  
  218. ; Copy the locale muck.
  219.  
  220. (if (exists "LOCALE:")
  221. (
  222.         (set lang
  223.                 (askoptions
  224.                         (prompt lang_msg)
  225.                         (help lang-help)
  226.                         (choices "Dansk" "Deutsch" "English" "Español" "Français" "Italiano" "Nederlands" "Norsk" "Português" "Svenska" )
  227.                         (default def-language)
  228.                 )
  229.         )
  230.         (user oldlevel)
  231.         (set n 0)
  232.         (while
  233.                 (set language
  234.                         (select n
  235.                                 "dansk"
  236.                                 "deutsch"
  237.                                 "english"
  238.                                 "español"
  239.                                 "français"
  240.                                 "italiano"
  241.                                 "nederlands"
  242.                                 "norsk"
  243.                                 "português"
  244.                                 "svenska"
  245.                                 ""
  246.                         )
  247.                 )
  248.         (
  249.                 (if (IN lang n)
  250.                 (
  251.                         (if (<> 2 n)
  252.                         (
  253.                                 (makedir (cat "LOCALE:Catalogs/" language))
  254.                                 (copyfiles
  255.                                         (source (cat cat-source language))
  256.                                         (dest (cat "LOCALE:Catalogs/" language))
  257.                                         (all)
  258.                                 )
  259.                         ))
  260.                 ))
  261.                 (set n (+ n 1))
  262.         ))
  263. ))
  264.